﻿'Hecho por Hernan Servetto
Imports Entidades

Imports ProyectoEnCapa.procedimientos_pedido

Public Class Class1
    Dim w As ProyectoEnCapa.procedimientos_pedido
    Sub New()
        w = New ProyectoEnCapa.procedimientos_pedido
    End Sub
    Function AltaPedido(ByVal nodo As Entidades.pedido) As Boolean
        Return w.AltaPedido(nodo)
    End Function
    Function BajaPedido(ByVal nodo As Entidades.pedido) As Boolean
        Return w.AltaPedido(nodo)
    End Function
    Function ModificarPedido(ByVal nodo As Entidades.pedido) As Boolean
        Return w.AltaPedido(nodo)
    End Function
    Function consultapedido(ByVal nodo As Entidades.pedido) As Boolean
        Return w.AltaPedido(nodo)
    End Function
End Class
